home *** CD-ROM | disk | FTP | other *** search
/ The Best of MacTutor - S…e Code for Volumes 1 to 5 / The Best of MacTutor - Source Code for Volume 1-5 (Wayzata Technology)(6031)(1990).bin / Source Code / #46 (Jul 89) / Window Menu Code / Window.r < prev   
Text File  |  1989-01-19  |  10KB  |  342 lines
  1. /*******************************************************************
  2.     
  3.     Window.r
  4.     
  5.     Resources for dynamic Window menu demo.
  6.     
  7.     (c) 1988, by Clifford Story & Attic Software
  8.     
  9. *******************************************************************/
  10.     
  11. #include "types.r"
  12.  
  13. /*******************************************************************
  14.     
  15.     Menu resources:
  16.     ---------------
  17.     A comment:  the Window menu is declared here, even though the
  18.     MDEF never references the declaration, so MenuKey can find the
  19.     keyboard equivalent for the “Zoom Front Window” command.
  20.     
  21. *******************************************************************/
  22.  
  23. resource 'MENU' (1001) {
  24.     1001,
  25.     textMenuProc,
  26.     $7FFFFFFB,
  27.     enabled,
  28.     apple,
  29.     {    /* array: 3 elements */
  30.         /* [1] */
  31.         "About Window...", noicon, "", "", plain,
  32.         /* [2] */
  33.         "About Attic Software...", noicon, "", "", plain,
  34.         /* [3] */
  35.         "-", noIcon, "", "", plain
  36.     }
  37. };
  38.  
  39. resource 'MENU' (1002, preload) {
  40.     1002,
  41.     textMenuProc,
  42.     0x7FFFFFFB,
  43.     enabled,
  44.     "File",
  45.     {    /* array: 4 elements */
  46.         /* [1] */
  47.         "New", noIcon, "N", "", plain,
  48.         /* [2] */
  49.         "Close", noIcon, "K", "", plain,
  50.         /* [3] */
  51.         "-", noIcon, "", "", plain,
  52.         /* [4] */
  53.         "Quit", noIcon, "Q", "", plain
  54.     }
  55. };
  56.  
  57. resource 'MENU' (1003, preload) {
  58.     1003,
  59.     textMenuProc,
  60.     0x7FFFFFFD,
  61.     enabled,
  62.     "Edit",
  63.     {    /* array: 6 elements */
  64.         /* [1] */
  65.         "Undo", noIcon, "Z", "", plain,
  66.         /* [2] */
  67.         "-", noIcon, "", "", plain,
  68.         /* [3] */
  69.         "Cut", noIcon, "X", "", plain,
  70.         /* [4] */
  71.         "Copy", noIcon, "C", "", plain,
  72.         /* [5] */
  73.         "Paste", noIcon, "V", "", plain,
  74.         /* [6] */
  75.         "Clear", noIcon, "", "", plain
  76.     }
  77. };
  78.  
  79. resource 'MENU' (1004, preload) {
  80.     1004,
  81.     1001,
  82.     0x7FFFFFFC,
  83.     enabled,
  84.     "Window",
  85.     {    /* array: 2 elements */
  86.         /* [1] */
  87.         "Zoom Front Window", noIcon, "W", "", plain,
  88.         /* [2] */
  89.         "-", noIcon, "", "", plain
  90.     }
  91. };
  92.  
  93. /*******************************************************************
  94.     
  95.     Picture resources
  96.     
  97. *******************************************************************/
  98.  
  99. resource 'PICT' (1001, "About", purgeable) {
  100.     1163,
  101.     {7, 7, 307, 498},
  102.     $"1101 A000 82A0 008C 0100 0A00 0700 0701"
  103.     $"3301 F20A 0000 0000 0000 0000 0B00 1B00"
  104.     $"1B44 0009 0009 0131 01F0 0700 0200 0248"
  105.     $"A100 9600 0605 0000 0002 03A1 009A 0008"
  106.     $"004C 0000 00D8 0000 A000 9803 0003 0D00"
  107.     $"0C2B 2353 2257 696E 646F 7720 6465 6D6F"
  108.     $"6E73 7472 6174 6573 2061 2064 796E 616D"
  109.     $"6963 2057 696E 6429 ED1D 6F77 206D 656E"
  110.     $"752E 2020 4561 6368 2074 696D 6520 6120"
  111.     $"7769 6E64 6F77 0DA0 0099 A100 9A00 0800"
  112.     $"3C00 0000 D800 00A0 0098 2800 6300 2322"
  113.     $"6973 206F 7065 6E65 6420 6F72 2063 6C6F"
  114.     $"7365 642C 206F 7220 7468 6520 7769 6E64"
  115.     $"6F77 29D8 1C20 6F72 6465 7220 6368 616E"
  116.     $"6765 732C 2074 6865 206D 656E 7520 6973"
  117.     $"0DA0 0099 A100 9A00 0800 2C00 0000 D800"
  118.     $"00A0 0098 2800 7300 2322 6175 746F 6D61"
  119.     $"7469 6361 6C6C 7920 7570 6461 7465 6420"
  120.     $"746F 2072 6566 6C65 6374 2074 29D6 1E68"
  121.     $"6520 6E65 7720 7769 6E64 6F77 206F 7264"
  122.     $"6572 2C20 7769 7468 2074 6865 0DA0 0099"
  123.     $"A100 9A00 0800 1C00 0000 D800 00A0 0098"
  124.     $"2800 8300 2322 746F 7020 7769 6E64 6F77"
  125.     $"2061 7420 7468 6520 746F 7020 6F66 2074"
  126.     $"6865 206D 656E 752C 29DA 2220 616E 6420"
  127.     $"736F 206F 6E2E 2020 5468 6973 2069 7320"
  128.     $"616C 6C20 646F 6E65 2062 7920 7429 C403"
  129.     $"6865 0DA0 0099 A100 9A00 0800 0C00 0000"
  130.     $"D800 00A0 0098 2800 9300 2322 4D44 4546"
  131.     $"3B20 7468 6520 7072 6F67 7261 6D20 6974"
  132.     $"7365 6C66 206E 6565 6420 6E6F 7420 29D6"
  133.     $"1E62 6520 636F 6E63 6572 6E65 6420 7769"
  134.     $"7468 206D 6169 6E74 6169 6E69 6E67 0DA0"
  135.     $"0099 A100 9A00 08FF FC00 0000 D800 00A0"
  136.     $"0098 2800 A300 230A 7468 6520 6D65 6E75"
  137.     $"2E0D A000 99A1 009A 0008 FFEC 0000 00D8"
  138.     $"0000 A000 982A 1001 0DA0 0099 A100 9A00"
  139.     $"08FF DC00 0000 D800 00A0 0098 2A10 2259"
  140.     $"6F75 2063 616E 2061 6464 2074 6869 7320"
  141.     $"6D65 6E75 2074 6F20 796F 7572 206F 776E"
  142.     $"2029 D91F 7072 6F67 7261 6D73 2062 7920"
  143.     $"7369 6D70 6C79 2063 6F70 7969 6E67 2074"
  144.     $"6865 0DA0 0099 A100 9A00 08FF CC00 0000"
  145.     $"D800 00A0 0098 2800 D300 2322 4D44 4546"
  146.     $"2072 6573 6F75 7263 6520 7769 7468 2052"
  147.     $"6573 6564 6974 2E20 2041 6E20 6172 29D9"
  148.     $"2174 6963 6C65 206F 6E20 7468 6973 2070"
  149.     $"726F 6772 616D 2C20 696E 636C 7564 696E"
  150.     $"670D A000 99A1 009A 0008 FFBC 0000 00D8"
  151.     $"0000 A000 9828 00E3 0023 2263 6F6D 706C"
  152.     $"6574 6520 5061 7363 616C 2073 6F75 7263"
  153.     $"6520 636F 6465 2C20 6861 7320 6229 DB1F"
  154.     $"6565 6E20 7375 626D 6974 7465 6420 746F"
  155.     $"204D 6163 2054 7574 6F72 2028 6966 0DA0"
  156.     $"0099 A100 9A00 08FF AC00 0000 D800 00A0"
  157.     $"0098 2800 F300 2322 6974 2064 6F65 736E"
  158.     $"2774 2067 6574 2070 7562 6C69 7368 6564"
  159.     $"2C20 4927 6C6C 2072 656C 29C2 1865 6173"
  160.     $"6520 7468 6520 736F 7572 6365 206D 7973"
  161.     $"656C 6629 2EA0 0099 A000 97A1 0096 0006"
  162.     $"0600 0000 0203 A100 9A00 08FF FA00 0000"
  163.     $"2500 00A0 0098 0405 0D00 1228 002C 00D9"
  164.     $"0657 696E 646F 77A0 0099 A000 97A1 0096"
  165.     $"0006 0600 0000 0203 A100 9A00 08FF FC00"
  166.     $"0000 D600 00A0 0098 0400 0D00 0928 0122"
  167.     $"0026 22A9 2031 3938 382C 2031 3938 3920"
  168.     $"6279 2043 6C69 6666 6F72 6420 5374 6F72"
  169.     $"7920 616E 6429 A622 2041 7474 6963 2053"
  170.     $"6F66 7477 6172 652C 2050 2E4F 2E20 426F"
  171.     $"7820 3231 392C 2047 6F6C 299E 1765 7461"
  172.     $"2C20 4361 6C69 666F 726E 6961 2020 2039"
  173.     $"3331 3136 A000 99A0 0097 A000 8DA0 0083"
  174.     $"FF"
  175. };
  176.  
  177. resource 'PICT' (1002, "Attic", purgeable) {
  178.     1131,
  179.     {7, 7, 307, 498},
  180.     $"1101 A000 82A0 008C 0100 0A00 0700 0701"
  181.     $"3301 F20A 0000 0000 0000 0000 0B00 1B00"
  182.     $"1B44 0009 0009 0131 01F0 0700 0200 0248"
  183.     $"A100 9600 0606 0000 0002 03A1 009A 0008"
  184.     $"FFFA 0000 004B 0000 A000 9803 0003 0405"
  185.     $"0D00 122B BB2C 0E41 7474 6963 2053 6F66"
  186.     $"7477 6172 65A0 0099 A000 97A1 0096 0006"
  187.     $"0500 0000 0203 A100 9A00 0800 5C00 0000"
  188.     $"E600 00A0 0098 0400 0D00 0C28 004E 001E"
  189.     $"2241 7474 6963 2053 6F66 7477 6172 6520"
  190.     $"6973 2061 2073 6D61 6C6C 204D 6163 696E"
  191.     $"746F 7329 DC22 6820 7072 6F67 7261 6D6D"
  192.     $"696E 6720 636F 6D70 616E 792E 2069 6E20"
  193.     $"6275 7369 6E65 7373 29E2 010D A000 99A1"
  194.     $"009A 0008 004C 0000 00E6 0000 A000 9828"
  195.     $"005E 001E 2273 696E 6365 2031 3938 362E"
  196.     $"2020 5765 2064 6F20 6120 7661 7269 6574"
  197.     $"7920 6F66 2077 6F29 D722 726B 3B20 D249"
  198.     $"6465 616C 696E 6572 D32C 2061 2073 6861"
  199.     $"7265 7761 7265 206F 7574 6C69 29D1 056E"
  200.     $"6572 2C0D A000 99A1 009A 0008 003C 0000"
  201.     $"00E6 0000 A000 9828 006E 001E 2269 7320"
  202.     $"6F75 7220 6265 7374 2D6B 6E6F 776E 2070"
  203.     $"726F 6475 6374 2E20 2057 6520 616C 7329"
  204.     $"D81B 6F20 646F 2063 6F6E 7472 6163 7420"
  205.     $"7072 6F67 7261 6D6D 696E 672E 0DA0 0099"
  206.     $"A100 9A00 0800 2C00 0000 E600 00A0 0098"
  207.     $"2800 7E00 1E01 0DA0 0099 A100 9A00 0800"
  208.     $"1C00 0000 E600 00A0 0098 2A10 1E57 6520"
  209.     $"6361 6E20 6265 2072 6561 6368 6564 2062"
  210.     $"7920 6D61 696C 2061 743A 0DA0 0099 A100"
  211.     $"9A00 0800 0C00 0000 E600 00A0 0098 2A10"
  212.     $"010D A000 99A1 009A 0008 FFFC 0000 00E6"
  213.     $"0000 A000 982A 1022 2020 2020 2020 2020"
  214.     $"2020 2020 2020 2020 2020 2020 2020 2020"
  215.     $"2020 2020 2020 2041 7474 2991 0C69 6320"
  216.     $"536F 6674 7761 7265 0DA0 0099 A100 9A00"
  217.     $"08FF EC00 0000 E600 00A0 0098 2800 BE00"
  218.     $"1E22 2020 2020 2020 2020 2020 2020 2020"
  219.     $"2020 2020 2020 2020 2020 2020 2020 2020"
  220.     $"2050 2E4F 298F 0A2E 2042 6F78 2032 3139"
  221.     $"0DA0 0099 A100 9A00 08FF DC00 0000 E600"
  222.     $"00A0 0098 2800 CE00 1E22 2020 2020 2020"
  223.     $"2020 2020 2020 2020 2020 2020 2020 2020"
  224.     $"2020 2020 2020 2020 2047 6F6C 2990 1865"
  225.     $"7461 2C20 4361 6C69 666F 726E 6961 2020"
  226.     $"2039 3331 3136 0DA0 0099 A100 9A00 08FF"
  227.     $"CC00 0000 E600 00A0 0098 2800 DE00 1E01"
  228.     $"0DA0 0099 A100 9A00 08FF BC00 0000 E600"
  229.     $"00A0 0098 2A10 2257 6520 616C 736F 206F"
  230.     $"7065 7261 7465 2061 2062 756C 6C65 7469"
  231.     $"6E20 626F 6172 6420 7329 D422 7973 7465"
  232.     $"6D20 6174 2028 3830 3529 2036 3833 2D30"
  233.     $"3332 322C 2062 6574 7765 656E 2074 29E6"
  234.     $"0368 650D A000 99A1 009A 0008 FFAC 0000"
  235.     $"00E6 0000 A000 9828 00FE 001E 2268 6F75"
  236.     $"7273 206F 6620 363A 3030 2050 4D20 616E"
  237.     $"6420 323A 3030 2041 4D2C 2050 6163 6929"
  238.     $"D822 6669 6320 7469 6D65 2C20 7365 7665"
  239.     $"6E20 6461 7973 2061 2077 6565 6B2E 2020"
  240.     $"506C 6561 29D3 0373 650D A000 99A1 009A"
  241.     $"0008 FF9C 0000 00E6 0000 A000 9828 010E"
  242.     $"001E 1566 6565 6C20 6672 6565 2074 6F20"
  243.     $"6361 6C6C 2069 6E21 A000 99A0 0097 A100"
  244.     $"9600 0606 0000 0002 03A1 009A 0008 FFFC"
  245.     $"0000 0076 0000 A000 980D 0009 2B69 1722"
  246.     $"A920 3139 3838 2C20 3139 3839 2062 7920"
  247.     $"436C 6966 666F 7264 2053 746F 7279 2061"
  248.     $"6E64 29A6 0F20 4174 7469 6320 536F 6674"
  249.     $"7761 7265 A000 99A0 0097 A000 8DA0 0083"
  250.     $"FF"
  251. };
  252.  
  253. /*******************************************************************
  254.     
  255.     Alert resource
  256.     
  257. *******************************************************************/
  258.  
  259. resource 'ALRT' (1001, "Message", purgeable) {
  260.     {0, 0, 122, 300},
  261.     1001,
  262.     {    /* array: 4 elements */
  263.         /* [1] */
  264.         OK, visible, sound1,
  265.         /* [2] */
  266.         OK, visible, sound1,
  267.         /* [3] */
  268.         OK, visible, sound1,
  269.         /* [4] */
  270.         OK, visible, sound1
  271.     }
  272. };
  273.  
  274. /*******************************************************************
  275.     
  276.     Item list resource
  277.     
  278. *******************************************************************/
  279.  
  280. resource 'DITL' (1001, "Message", purgeable) {
  281.     {    /* array DITLarray: 2 elements */
  282.         /* [1] */
  283.         {92, 120, 112, 180},
  284.         Button {
  285.             enabled,
  286.             "OK"
  287.         },
  288.         /* [2] */
  289.         {10, 10, 74, 290},
  290.         StaticText {
  291.             disabled,
  292.             "Sorry!  This program can open only 18 wi"
  293.             "ndows at one time (if it opened more, th"
  294.             "e menu would be too long for the screen)"
  295.             "."
  296.         }
  297.     }
  298. };
  299.  
  300.  
  301. /*******************************************************************
  302.     
  303.     Window resources
  304.     
  305. *******************************************************************/
  306.  
  307. resource 'WIND' (1001, purgeable) {
  308.     {0, 0, 200, 320},
  309.     documentProc,
  310.     invisible,
  311.     goaway,
  312.     0x0,
  313.     "untitled"
  314. };
  315.  
  316. resource 'WIND' (1002, purgeable) {
  317.     {0, 0, 200, 320},
  318.     zoomDocProc,
  319.     invisible,
  320.     -1,
  321.     0x0,
  322.     "untitled"
  323. };
  324.  
  325. /*******************************************************************
  326.     
  327.     Multifinder resource
  328.     
  329. *******************************************************************/
  330.  
  331. resource 'SIZE' (-1) {
  332.     saveScreen,
  333.     acceptSuspendResumeEvents,
  334.     enableOptionSwitch,
  335.     cannotBackground,
  336.     MultiFinderAware,
  337.     98304,
  338.     98304
  339. };
  340.     
  341. /******************************************************************/
  342.